(Info)
@SystemMessage #VANC #VANP Variable info
@SystemMessage #VANC #VANP Pain treshold: Your ability to handle impact pain
@SystemMessage #VANC #VANP Pain endurance: Your ability to handle constant pain over time
@SystemMessage #VANC #VANP Endurance: Your patience regarding corner time etc.
@SystemMessage #VANC #VANP Strictness: Your #DomHonorific level of forgiveness etc.
@SystemMessage #VANC #VANP Devotion: The value used to determine the length of sessions
@SystemMessage #VANC #VANP Devotion ranges from 30 - 90 
@SystemMessage #VANC #VANP The numbers corresponding to minutes
@SystemMessage #VANC #VANP Meaning a session can last between ½ to 1½ hour
@SystemMessage #VANC #VANP But might be shorter / longer
(P1)
@SystemMessage #VANC #VANP You currently have Pain treshhold set at @ShowVar[SubPain]
@SystemMessage #VANC #VANP Input a new value, it must be between 1-10 @InputVar[SubPain]
@Variable[SubPain]>[10] @SystemMessage #VANC #VANP The value chosen is higher than 10 @Goto(P1)
@Variable[SubPain]<[1] @SystemMessage #VANC #VANP  The value chosen is lower than 1 @Goto(P1)
@SystemMessage #VANC #VANP New value accepted..
(P2)
@SystemMessage #VANC #VANP You currently have Pain endurance set at @ShowVar[SubPainTolerance]
@SystemMessage #VANC #VANP Input a new value, it must be between 1-10 @InputVar[SubPainTolerance]
@Variable[SubPainTolerance]>[10] @SystemMessage #VANC #VANP The value chosen is higher than 10 @Goto(P1)
@Variable[SubPainTolerance]<[1] @SystemMessage #VANC #VANP  The value chosen is lower than 1 @Goto(P1)
@SystemMessage #VANC #VANP New value accepted..
(P3)
@SystemMessage #VANC #VANP You currently have Endurance set at @ShowVar[SubEndurance]
@SystemMessage #VANC #VANP Input a new value, it must be between 1-10 @InputVar[SubEndurance]
@Variable[SubEndurance]>[10] @SystemMessage #VANC #VANP The value chosen is higher than 10 @Goto(P1)
@Variable[SubEndurance]<[1] @SystemMessage #VANC #VANP  The value chosen is lower than 1 @Goto(P1)
@SystemMessage #VANC #VANP New value accepted..
(P4)
@SystemMessage #VANC #VANP You currently have Strictness set at @ShowVar[SubStrictness]
@SystemMessage #VANC #VANP Input a new value, it must be between 1-10 @InputVar[SubStrictness]
@Variable[SubStrictness]>[10] @SystemMessage #VANC #VANP The value chosen is higher than 10 @Goto(P1)
@Variable[SubStrictness]<[1] @SystemMessage #VANC #VANP The value chosen is lower than 1 @Goto(P1)
@SystemMessage #VANC #VANP New value accepted..
(P5)
@SystemMessage #VANC #VANP You currently have Devotion set at @ShowVar[DevotionSet]
@SystemMessage #VANC #VANP Input a new value, it must be between 30-90 @InputVar[DevotionSet]
@Variable[DevotionSet]>[90] @SystemMessage #VANC #VANP The value chosen is higher than 90 @Goto(P1)
@Variable[DevotionSet]<[30] @SystemMessage #VANC #VANP The value chosen is lower than 30 @Goto(P1)
@SystemMessage #VANC #VANP New value accepted, making changes - please wait
@NullResponse @CallReturn(CR\Settings\DevotionSet.txt)
@SystemMessage #VANC #VANP Devotion is fully set
(P6)
@SystemMessage #VANC #VANP Next you have the option to set your module categories
@SystemMessage #VANC #VANP All modules are divided into 5 categories
@SystemMessage #VANC #VANP Chastity, Humiliation, Pain, Slave and Tease
@SystemMessage #VANC #VANP All categories except for chastity is assigned a value between 1 and 100
@SystemMessage #VANC #VANP As a base all categories are given the value 60
@SystemMessage #VANC #VANP Making all modules have an equal chance of appearing
@SystemMessage #VANC #VANP The higher the value, the higher chance it has of occuring
@SystemMessage #VANC #VANP It's not recommended to change it from the base 60
@SystemMessage #VANC #VANP But should you do it, only do it with one category
(P6a)
@SystemMessage #VANC #VANP Input a value for Humiliation modules @InputVar[SissyModuleModule]
@Variable[SissyModuleModule]<[100]AND[SissyModuleModule]>[1] @NullResponse @Goto(P6b)
@SystemMessage #VANC #VANP You must choose a simple value between 1 and 100
@SystemMessage #VANC #VANP so writing '1' or '60 or '40' is okay @Goto(P6a)
(P6b)
@SystemMessage #VANC #VANP Input a value for Pain modules @InputVar[PainModules]
@Variable[PainModules]<[100]AND[PainModules]>[1] @NullResponse @Goto(P6c)
@SystemMessage #VANC #VANP You must choose a simple value between 1 and 100
@SystemMessage #VANC #VANP so writing '1' or '60 or '40' is okay @Goto(P6b)
(P6c)
@SystemMessage #VANC #VANP Input a value for Tease modules @InputVar[TeaseModule]
@Variable[TeaseModule]<[100]AND[TeaseModule]>[1] @NullResponse @Goto(P6d)
@SystemMessage #VANC #VANP You must choose a simple value between 1 and 100
@SystemMessage #VANC #VANP so writing '1' or '60 or '40' is okay @Goto(P6c)
(P6d)
@SystemMessage #VANC #VANP Input a value for  modules @InputVar[SlaveModule]
@Variable[SlaveModule]<[100]AND[SlaveModule]>[1] @NullResponse @Goto(P7)
@SystemMessage #VANC #VANP You must choose a simple value between 1 and 100
@SystemMessage #VANC #VANP so writing '1' or '60 or '40' is okay @Goto(P6d)
(P7)
@flag(FullTimeTrial) @SystemMessage #VANC #VANP You are currently doing a trial of full time @Goto(P7a)
@Flag(FullTime) @SystemMessage #VANC #VANP You are currently full time @Goto(P7b)
@Flag(PartTime) @SystemMessage #VANC #VANP You are currently part time @Goto(P7c)
(P7a)
@SystemMessage #VANC #VANP Do you wish to end the trial, go full time permanently or return
[end]@SystemMessage #VANC #VANP Ending.. @DeleteFlag(FullTime) @SetFlag(PartTime)
[full]@SystemMessage #VANC #VANP Changing settings @DeleteFlag(FullTimeTrial) @SetFlag(FullTime) @Goto(End)
[return]@NullResponse @Goto(End)
@DifferentAnswer @SystemMessage #VANC #VANP End, full time or return?
@NullResponse @DeleteFlag(FullTimeTrial) @Goto(End)
(P7b)
@SystemMessage #VANC #VANP Do you wish to return to part time or return
[part]@NullResponse @If[GNMGold]<[2000]Then(Poor1)
[return]@NullResponse @Goto(End)
@DifferentAnswer @SystemMessage #VANC #VANP Part time or return?
@SystemMessage #VANC #VANP Changing settings.. @ChangeVar[GNMGold]=[GNMGold]-[2000] @DeleteFlag(FullTime) @SetFlag(PartTime) @Goto(End)
(P7c)
@SystemMessage #VANC #VANP Do you wish to change to full time, try full time or return?
[full]@SystemMessage #VANC #VANP Changing settings @DeleteFlag(PartTime) @SetFlag(FullTime) @Goto(End)
[try]@NullResponse @CheckFlag(FirstFullTrial) @SetFlag(FirstFullTrial) @Goto(P7d)
[return]@NullResponse @Goto(End)
@DifferentAnswer @SystemMessage #VANC #VANP Full time, try or return?
(FirstFullTrial)
@SystemMessage #VANC #VANP You've already tried the free trial
@SystemMessage #VANC #VANP If you wish to do so again the price is 200 gold @If[GNMGold]<[200]Then(Poor2)
@SystemMessage #VANC #VANP Do you wish to do a trial period again?
[yes]@SystemMessage #VANC #VANP Changing settings..
[no]@NullResponse @Goto(End)
@DifferentAnswer @SystemMessage #VANC #VANP Yes or no?
(P7d)
@NullResponse @SetFlag(FullTimeTrial) @DeleteFlag(PartTime)
@NullResponse @SetFlag(FullTime)
@NullResponse @SetVar[SlaveVisit]=[0] @ChangeVar[SlaveVisit]=[SlaveVisit]+[1]
@NullResponse @SetVar[AskedToFun]=[0]
@NullResponse @SetVar[GNMChoresDone]=[0]
@NullResponse @SetDate(TrialPeriod, 0 Days)
@NullResponse @SetDate(RoutineCheck, 20 Hours)
@NullResponse @SetDate(WeekCheck, 168 Hours)
@SystemMessage #VANC #VANP Your trial period is now set @Goto(End)
(Poor1)
@SystemMessage #VANC #VANP The price to return to part time is 2000 gold
@SystemMessage #VANC #VANP You only have @ShowVar[GNMGold] gold @Goto(End)
(Poor2)
@SystemMessage #VANC #VANP The price to try full time again is 200 gold
@SystemMessage #VANC #VANP You only have @ShowVar[GNMGold] gold @Goto(End)
(End)
@End